Eros - Digital Erotica & Games/Eros - Digital Erotica & Games.iso/mac/EROS vol.1/EROS vol.DXR/00243.ls

Text File | 1995-07-07 | 418 b | 13 lines

on mouseUp
  global md2, rantime, mp
  set rantime to the ticks
  set mp to 5
  if the name of cast the castNum of sprite 5 = "end" then
    set the castNum of sprite 5 to the number of cast "VBSTART"
    set md2 to the duration of cast the castNum of sprite 5 - 3
  else
    set md2 to the duration of cast (the castNum of sprite 5 + 1) - 3
    set the castNum of sprite 5 to the castNum of sprite 5 + 1
  end if
end